home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / ada / atutr202.zip / tomorrow.dum < prev    next >
Text File  |  1992-09-04  |  155b  |  7 lines
  1. -- Dummy solution to Outside Assignment 3
  2. separate (NEXTDATE)
  3. function TOMORROW(TODAY : in DATE) return DATE is
  4. begin
  5.    return TODAY;
  6. end TOMORROW;
  7.